Logiciels PC 21

home *** CD-ROM | disk | FTP | other *** search

/ Logiciels PC 21 / LogicielsPC_21.iso / Creation / Exemple LPC21 / Advanced / Mailing List.psm < prev next >

Wrap

Text File | 2001-08-28 | 119KB | 5,013 lines

SCRIPT v0.60 GENERAL Mailing List Sender Sylvain Seccia c:\Program Files\Sylvain Seccia\PSM Samples\Mailing List Sender\ Mailing List.bmp Sylvain Seccia\PSM Samples\Mailing List Sender 0 DIALOGS:5 MAIN:37 SendMail,LoadAddress,LoadMsg,SaveMsg,SaveAddress,SetItemText,SendMailTo,zzFunc008,zzFunc009,zzFunc010,zzFunc011,zzFunc012,zzFunc013,zzFunc014,zzFunc015,zzFunc016,zzFunc017,zzFunc018,zzFunc019,zzFunc020,zzFunc021,zzFunc022,zzFunc023,zzFunc024,zzFunc025,zzFunc026,zzFunc027,zzFunc028,zzFunc029,zzFunc030,zzFunc031,zzFunc032,zzFunc033,zzFunc034,zzFunc035,zzFunc036,zzFunc037,zzFunc038,zzFunc039,zzFunc040,zzFunc041,zzFunc042,zzFunc043,zzFunc044,zzFunc045,zzFunc046,zzFunc047,zzFunc048,zzFunc049,zzFunc050,zzFunc051,zzFunc052,zzFunc053,zzFunc054,zzFunc055,zzFunc056,zzFunc057,zzFunc058,zzFunc059,zzFunc060,zzFunc061,zzFunc062,zzFunc063,zzFunc064,zzFunc065,zzFunc066,zzFunc067,zzFunc068,zzFunc069,zzFunc070,zzFunc071,zzFunc072,zzFunc073,zzFunc074,zzFunc075,zzFunc076,zzFunc077,zzFunc078,zzFunc079,zzFunc080,zzFunc081,zzFunc082,zzFunc083,zzFunc084,zzFunc085,zzFunc086,zzFunc087,zzFunc088,zzFunc089,zzFunc090,zzFunc091,zzFunc092,zzFunc093,zzFunc094,zzFunc095,zzFunc096,zzFunc097,zzFunc098,zzFunc099,zzFunc100, If If New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 While While New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Function Function New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:100 SendMail 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Send mail to all address #If.IF<#m_ListAddress2.GetCount<>, "=", "0"> #MessageBox.Open<"Error", "No Address !", "OK", "EXCLAMATION"> #If.ELSE<> #If.ENDIF<> #MAIN.OpenModalWindow<"SENDING", "-1", "-1"> #Function.Call<"SENDING", "SendNow", #m_ListAddress2.GetCount<>> END LoadAddress 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Load Address from Text File #If.IF<#m_Selector.OpenDialog<"", "Text Files|*.txt|All Files|*.*||", "NONE">, "=", "0"> #General.Return<""> #If.ELSE<> #If.ENDIF<> #If.IF<#m_File.Open<#m_Selector.GetPathName<"0">, "READ">, "=", "0"> #General.Return<""> #If.ELSE<> #If.ENDIF<> #m_ListAddress.Reset<> #m_ListAddress2.Reset<> #i.Set<"0"> #While.WHILE<#m_File.GetPos<>, "<", #m_File.Length<>> #If.IF<#i.Get<>, "=", "0"> #str.Set<#m_File.ReadWord<#General.GetChar<"13">>> #If.IF<#str.Get<>, "=", "END"> #i.Set<"1"> #m_File.ReadByte<> #General.Continue<> #If.ELSE<> #If.ENDIF<> #m_ListAddress.AddString<#str.Get<>> #If.ELSE<> #str.Set<#m_File.ReadWord<#General.GetChar<"13">>> #m_ListAddress2.AddString<#str.Get<>> #If.ENDIF<> #m_File.ReadByte<> #While.ENDWHILE<> #m_File.Close<> END LoadMsg 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Load Message From Text File #If.IF<#m_Selector.OpenDialog<"", "Text Files|*.txt|All Files|*.*||", "NONE">, "=", "0"> #General.Return<""> #If.ELSE<> #If.ENDIF<> #m_RichEdit.SetText<""> #m_File.Open<#m_Selector.GetPathName<"0">, "READ"> #str.Set<#m_File.ReadWord<#General.GetChar<"13">>> #m_EditSubject.SetText<#str.Get<>> #m_File.ReadByte<> #While.WHILE<#m_File.GetPos<>, "<", #m_File.Length<>> #str.Set<#m_File.ReadWord<#General.GetChar<"10">>> #m_RichEdit.SetText<#m_RichEdit.GetText<>&#str.Get<>&#General.GetChar<"10">> #While.ENDWHILE<> #m_File.Close<> END SaveMsg 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Save Message To Text File #If.IF<#m_Selector.SaveDialog<"", "txt", "Text Files|*.txt||", "NONE">, "=", "0"> #General.Return<""> #If.ELSE<> #If.ENDIF<> #m_File.Open<#m_Selector.GetPathName<"0">, "WRITE"> #m_File.Write<#m_EditSubject.GetText<>> #m_File.Write<#General.GetChar<"13">&#General.GetChar<"10">> #m_File.Write<#m_RichEdit.GetText<>> #m_File.Close<> END SaveAddress 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Save Address to Text File #If.IF<#m_Selector.SaveDialog<"", "txt", "Text Files|*.txt||", "NONE">, "=", "0"> #General.Return<""> #If.ELSE<> #If.ENDIF<> #If.IF<#m_File.Open<#m_Selector.GetPathName<"0">, "WRITE">, "=", "0"> #General.Return<""> #If.ELSE<> #If.ENDIF<> #i.Set<"-1"> #While.WHILE<#i.AddOne<>, "<", #m_ListAddress.GetCount<>> #m_File.Write<#m_ListAddress.GetTextAt<#i.Get<>>> #m_File.Write<#General.GetChar<"13">&#General.GetChar<"10">> #While.ENDWHILE<> #m_File.Write<"END"&#General.GetChar<"13">&#General.GetChar<"10">> #i.Set<"-1"> #While.WHILE<#i.AddOne<>, "<", #m_ListAddress2.GetCount<>> #m_File.Write<#m_ListAddress2.GetTextAt<#i.Get<>>> #m_File.Write<#General.GetChar<"13">&#General.GetChar<"10">> #While.ENDWHILE<> #m_File.Close<> END SetItemText 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Param 1 : Item Index $Param 2 : New Text $ $Change List Item Text #m_ListAddress.SetTextAt<#General.GetParam<"0">, #General.GetParam<"1">> END SendMailTo 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Param 0 : Index $ $Send Message to address #m_Ini.Open<#System.GetProgramFolder<>&"settings.ini"> #If.IF<#m_Network.SendMail<#m_Ini.GetValue<"OPTIONS", "DOMAIN">, #m_Ini.GetValue<"OPTIONS", "EMAIL">, #m_ListAddress2.GetTextAt<#General.GetParam<"0">>, #m_EditSubject.GetText<>, #m_RichEdit.GetText<>>, "=", "0"> #If.IF<#MessageBox.Open<"Error", "Cannot send email. Do you want to continue ?", "YESNO", "QUESTION">, "=", "NO"> #m_Ini.Close<> #General.Return<"0"> #If.ELSE<> #If.ENDIF<> #If.ELSE<> #If.ENDIF<> #m_Ini.Close<> #General.Return<"1"> END zzFunc008 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc009 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc010 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc011 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc012 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc013 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc014 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc015 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc016 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc017 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc018 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc019 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc020 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc021 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc022 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc023 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc024 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc025 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc026 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc027 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc028 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc029 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc030 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc031 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc032 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc033 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc034 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc035 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc036 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc037 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc038 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc039 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc040 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc041 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc042 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc043 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc044 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc045 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc046 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc047 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc048 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc049 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc050 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc051 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc052 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc053 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc054 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc055 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc056 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc057 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc058 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc059 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc060 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc061 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc062 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc063 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc064 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc065 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc066 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc067 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc068 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc069 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc070 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc071 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc072 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc073 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc074 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc075 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc076 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc077 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc078 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc079 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc080 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc081 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc082 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc083 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc084 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc085 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc086 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc087 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc088 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc089 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc090 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc091 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc092 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc093 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc094 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc095 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc096 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc097 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc098 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc099 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc100 0 $To run this function use Call<> function $You can change its name from the tree control. END MAIN Dialog Mailing List Sender 0,0,520,452 WS_CHILD,WS_VISIBLE,WS_MINIMIZEBOX,WS_MAXIMIZEBOX,WS_SYSMENU,1, 0 192,192,192 EVENTS:17 OnClose 0 $Object Type : Dialog $Event Name : OnClose END OnDragFile 0 $Object Type : Dialog $Event Name : OnDragFile $Parameter 0 : Number of files $Parameter 1 : Pathname 1 $Parameter 2 : Pathname 2... $ END OnDraw 0 $Object Type : Dialog $Event Name : OnDraw END OnHScroll 0 $Object Type : Dialog $Event Name : OnHScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END OnLButtonDbClk 0 $Object Type : Dialog $Event Name : OnLButtonDbClk END OnLButtonDown 0 $Object Type : Dialog $Event Name : OnLButtonDown END OnLButtonUp 0 $Object Type : Dialog $Event Name : OnLButtonUp END OnMButtonDbClk 0 $Object Type : Dialog $Event Name : OnMButtonDbClk END OnMButtonDown 0 $Object Type : Dialog $Event Name : OnMButtonDown END OnMButtonUp 0 $Object Type : Dialog $Event Name : OnMButtonUp END OnMove 0 $Object Type : Dialog $Event Name : OnMove END OnRButtonDbClk 0 $Object Type : Dialog $Event Name : OnRButtonDbClk END OnRButtonDown 0 $Object Type : Dialog $Event Name : OnRButtonDown END OnRButtonUp 0 $Object Type : Dialog $Event Name : OnRButtonUp END OnSize 0 $Object Type : Dialog $Event Name : OnSize END OnStart 0 $Object Type : Dialog $Event Name : OnStart $ $Menu #m_MenuFile.AddItem<"Load Address"> #m_MenuFile.AddItem<"Save Address"> #m_MenuFile.AddSeparator<> #m_MenuFile.AddItem<"Load Message"> #m_MenuFile.AddItem<"Save Message"> #m_MenuFile.AddSeparator<> #m_MenuFile.AddItem<"Send Mail"> #m_MenuFile.AddSeparator<> #m_MenuFile.AddItem<"Options"> #m_MenuFile.AddSeparator<> #m_MenuFile.AddItem<"Quit"> #m_MenuHelp.AddItem<"About..."> #m_Menu.AddMenu<#m_MenuFile.GetObjectID<>, "File"> #m_Menu.AddMenu<#m_MenuHelp.GetObjectID<>, "Help"> #m_Menu.Activate<> $Tool Bar #m_ToolBar.AddButton<"image/icon_open.bmp", #General.GetRGB<"255", "0", "0">> #m_ToolBar.SetTipText<"0", "Open Address"> #m_ToolBar.AddButton<"image/icon_save.bmp", #General.GetRGB<"255", "0", "0">> #m_ToolBar.SetTipText<"1", "Save Address"> #m_ToolBar.AddSeparator<"image/icon_separator.bmp"> #m_ToolBar.AddButton<"image/icon_open.bmp", #General.GetRGB<"255", "0", "0">> #m_ToolBar.SetTipText<"2", "Open Message"> #m_ToolBar.AddButton<"image/icon_save.bmp", #General.GetRGB<"255", "0", "0">> #m_ToolBar.SetTipText<"3", "Save Message"> #m_ToolBar.AddSeparator<"image/icon_separator.bmp"> #m_ToolBar.AddButton<"image/icon_send.bmp", #General.GetRGB<"255", "0", "0">> #m_ToolBar.SetTipText<"4", "Send Now"> #m_ToolBar.ActivateTip<"1"> $Button #m_ButtonSend.SetImage<"image/icon_send.bmp", #General.GetRGB<"255", "0", "0">, "", ""> #m_ButtonSend.SetTextColor<"0", #General.GetRGB<"255", "0", "0">> $Window #MAIN.SetMinSize<#MAIN.GetWidth<>, #MAIN.GetHeight<>> END OnVScroll 0 $Object Type : Dialog $Event Name : OnVScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END Disk Disk New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 General General New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Keyboard Keyboard New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:3 OnDlgKeyDown 0 $Object Type : Keyboard $Event Name : OnDlgKeyDown $Parameter 0 : Key Pressed END OnKeyDown 0 $Object Type : Keyboard $Event Name : OnKeyDown $Parameter 0 : Key Pressed END OnKeyUp 0 $Object Type : Keyboard $Event Name : OnKeyUp $Parameter 0 : Key Pressed END Math Math New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 MessageBox MessageBox New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Mouse Mouse New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:2 OnMove 0 $Object Type : Mouse $Event Name : OnMove END OnWheel 0 $Object Type : Mouse $Event Name : OnWheel $Parameter 0 : -1 if move down and 1 if move up END System System New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Timer Timer New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnTimer 0 $Object Type : Timer $Event Name : OnTimer $Parameter 0 : ID of the timer event END m_MenuFile Menu New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnSelect 0 $Object Type : Menu $Event Name : OnSelect $Parameter 0 : Index of the selected item $ #str.Set<#m_MenuFile.GetText<#General.GetParam<"0">>> #If.IF<#str.Get<>, "=", "Load Address"> #Function.Call<"", "LoadAddress"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Save Address"> #Function.Call<"", "SaveAddress"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Load Message"> #Function.Call<"", "LoadMsg"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Save Message"> #Function.Call<"", "SaveMsg"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Send Mail"> #Function.Call<"", "SendMail"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Options"> #MAIN.OpenModalWindow<"OPTION", "-1", "-1"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Quit"> #General.End<> #If.ELSE<> #If.ENDIF<> END m_Menu Menu New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnSelect 0 $Object Type : Menu $Event Name : OnSelect $Parameter 0 : Index of the selected item END str LocalString New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_RichEdit RichEdit 35,274,449,121 WS_CHILD,WS_VISIBLE,ES_MULTILINE,WS_HSCROLL,ES_AUTOHSCROLL,WS_VSCROLL,ES_AUTOVSCROLL,ES_WANTRETURN,WS_BORDER, 15 192,192,192 EVENTS:16 OnChange 0 $Object Type : RichEdit $Event Name : OnChange END OnHScroll 0 $Object Type : RichEdit $Event Name : OnHScroll END OnKeyDown 0 $Object Type : RichEdit $Event Name : OnKeyDown $Parameter 0 : Key Pressed END OnKeyUp 0 $Object Type : RichEdit $Event Name : OnKeyUp $Parameter 0 : Key Pressed END OnKillFocus 0 $Object Type : RichEdit $Event Name : OnKillFocus END OnLButtonDbClk 0 $Object Type : RichEdit $Event Name : OnLButtonDbClk END OnLButtonDown 0 $Object Type : RichEdit $Event Name : OnLButtonDown END OnLButtonUp 0 $Object Type : RichEdit $Event Name : OnLButtonUp END OnMButtonDbClk 0 $Object Type : RichEdit $Event Name : OnMButtonDbClk END OnMButtonDown 0 $Object Type : RichEdit $Event Name : OnMButtonDown END OnMButtonUp 0 $Object Type : RichEdit $Event Name : OnMButtonUp END OnRButtonDbClk 0 $Object Type : RichEdit $Event Name : OnRButtonDbClk END OnRButtonDown 0 $Object Type : RichEdit $Event Name : OnRButtonDown END OnRButtonUp 0 $Object Type : RichEdit $Event Name : OnRButtonUp END OnSetFocus 0 $Object Type : RichEdit $Event Name : OnSetFocus END OnVScroll 0 $Object Type : RichEdit $Event Name : OnVScroll END m_Group Group Address 16,37,489,178 WS_CHILD,WS_VISIBLE, 12 192,192,192 EVENTS:0 m_ListAddress List 27,81,230,99 WS_CHILD,WS_VISIBLE,WS_BORDER,LBS_SORT,WS_VSCROLL,LBS_NOINTEGRALHEIGHT,LBS_EXTENDEDSEL, 12 192,192,192 EVENTS:4 OnDoubleClick 0 $Object Type : List $Event Name : OnDoubleClick $ $Open Edit Dialog #MAIN.OpenModalWindow<"EDIT", "-1", "-1"> #Function.Call<"EDIT", "SetEmail", #m_ListAddress.GetCurSel<>, #m_ListAddress.GetTextAt<#m_ListAddress.GetCurSel<>>> END OnKillFocus 0 $Object Type : List $Event Name : OnKillFocus END OnSelChange 0 $Object Type : List $Event Name : OnSelChange END OnSetFocus 0 $Object Type : List $Event Name : OnSetFocus END m_ListAddress2 List 265,81,230,99 WS_CHILD,WS_VISIBLE,WS_BORDER,LBS_SORT,WS_VSCROLL,LBS_NOINTEGRALHEIGHT,LBS_EXTENDEDSEL, 8 192,192,192 EVENTS:4 OnDoubleClick 0 $Object Type : List $Event Name : OnDoubleClick END OnKillFocus 0 $Object Type : List $Event Name : OnKillFocus END OnSelChange 0 $Object Type : List $Event Name : OnSelChange END OnSetFocus 0 $Object Type : List $Event Name : OnSetFocus END m_TextAddress Text Address Book 32,59,150,17 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_TextAddress2 Text To send 273,59,92,17 WS_CHILD,WS_VISIBLE, 8 192,192,192 EVENTS:0 m_Group2 Group Message to send 16,222,489,188 WS_CHILD,WS_VISIBLE, 15 192,192,192 EVENTS:0 m_Selector Selector New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_ToolBar ToolBar 0,0,520,24 WS_CHILD,WS_VISIBLE,WS_BORDER, 12 192,192,192 EVENTS:1 OnSelect 0 $Object Type : ToolBar $Event Name : OnSelect $Parameter 0 : Index of the icon pushed. $ #str.Set<#m_ToolBar.GetTipText<#General.GetParam<"0">>> #If.IF<#str.Get<>, "=", "Open Address"> #Function.Call<"", "LoadAddress"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Save Address"> #Function.Call<"", "SaveAddress"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Open Message"> #Function.Call<"", "LoadMsg"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Save Message"> #Function.Call<"", "SaveMsg"> #If.ELSE<> #If.ENDIF<> #If.IF<#str.Get<>, "=", "Send Now"> #Function.Call<"", "SendMail"> #If.ELSE<> #If.ENDIF<> END m_File File New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 i LocalNumber New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_Network Network New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_EditSubject Edit 106,246,377,22 WS_CHILD,WS_VISIBLE,ES_AUTOHSCROLL,WS_BORDER,WS_TABSTOP, 12 192,192,192 EVENTS:5 OnChange 0 $Object Type : Edit $Event Name : OnChange END OnHScroll 0 $Object Type : Edit $Event Name : OnHScroll END OnKillFocus 0 $Object Type : Edit $Event Name : OnKillFocus END OnSetFocus 0 $Object Type : Edit $Event Name : OnSetFocus END OnVScroll 0 $Object Type : Edit $Event Name : OnVScroll END m_TextSubject Text Subject 37,249,55,18 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_MenuHelp Menu New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnSelect 0 $Object Type : Menu $Event Name : OnSelect $Parameter 0 : Index of the selected item $ #MAIN.OpenModalWindow<"ABOUT", "-1", "-1"> END m_Ini Ini New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_ButtonNew ButtonFlat New 27,184,53,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $When the user clicks on the New button #m_ListAddress.AddString<"name@domain.com"> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END m_ButtonAll ButtonFlat All 85,184,53,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $When the user clicks on the All button #m_ListAddress2.Reset<> #i.Set<"-1"> #While.WHILE<#i.AddOne<>, "<", #m_ListAddress.GetCount<>> #m_ListAddress2.AddString<#m_ListAddress.GetTextAt<#i.Get<>>> #While.ENDWHILE<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END m_ButtonAdd ButtonFlat Add Address 144,184,113,25 WS_CHILD,WS_VISIBLE, 12 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $When the user clicks on the Add button #m_ListAddress2.Reset<> #i.Set<"-1"> #While.WHILE<#i.AddOne<>, "<", #m_ListAddress.GetSelCount<>> #m_ListAddress2.AddString<#m_ListAddress.GetTextAt<#m_ListAddress.GetSels<#i.Get<>>>> #While.ENDWHILE<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END m_ButtonClear ButtonFlat Clear 265,184,53,25 WS_CHILD,WS_VISIBLE, 8 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $When the user clicks on the Clear button #m_ListAddress2.Reset<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END m_ButtonRemove ButtonFlat Remove Selected Address 324,184,170,25 WS_CHILD,WS_VISIBLE, 8 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $When the user clicks on the Remove button #i.Set<"-1"> #While.WHILE<#m_ListAddress2.GetSelCount<>, ">", "0"> #m_ListAddress2.DeleteString<#m_ListAddress2.GetSels<"0">> #While.ENDWHILE<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END m_ButtonSend ButtonFlat Send Mail Now 193,418,135,25 WS_CHILD,WS_VISIBLE, 6 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $Send mail to all address #Function.Call<"", "SendMail"> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END ABOUT:15 zzFunc001,zzFunc002,zzFunc003,zzFunc004,zzFunc005,zzFunc006,zzFunc007,zzFunc008,zzFunc009,zzFunc010,zzFunc011,zzFunc012,zzFunc013,zzFunc014,zzFunc015,zzFunc016,zzFunc017,zzFunc018,zzFunc019,zzFunc020,zzFunc021,zzFunc022,zzFunc023,zzFunc024,zzFunc025,zzFunc026,zzFunc027,zzFunc028,zzFunc029,zzFunc030,zzFunc031,zzFunc032,zzFunc033,zzFunc034,zzFunc035,zzFunc036,zzFunc037,zzFunc038,zzFunc039,zzFunc040,zzFunc041,zzFunc042,zzFunc043,zzFunc044,zzFunc045,zzFunc046,zzFunc047,zzFunc048,zzFunc049,zzFunc050,zzFunc051,zzFunc052,zzFunc053,zzFunc054,zzFunc055,zzFunc056,zzFunc057,zzFunc058,zzFunc059,zzFunc060,zzFunc061,zzFunc062,zzFunc063,zzFunc064,zzFunc065,zzFunc066,zzFunc067,zzFunc068,zzFunc069,zzFunc070,zzFunc071,zzFunc072,zzFunc073,zzFunc074,zzFunc075,zzFunc076,zzFunc077,zzFunc078,zzFunc079,zzFunc080,zzFunc081,zzFunc082,zzFunc083,zzFunc084,zzFunc085,zzFunc086,zzFunc087,zzFunc088,zzFunc089,zzFunc090,zzFunc091,zzFunc092,zzFunc093,zzFunc094,zzFunc095,zzFunc096,zzFunc097,zzFunc098,zzFunc099,zzFunc100, If If New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 While While New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Function Function New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:100 zzFunc001 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc002 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc003 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc004 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc005 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc006 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc007 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc008 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc009 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc010 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc011 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc012 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc013 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc014 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc015 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc016 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc017 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc018 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc019 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc020 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc021 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc022 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc023 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc024 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc025 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc026 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc027 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc028 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc029 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc030 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc031 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc032 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc033 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc034 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc035 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc036 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc037 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc038 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc039 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc040 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc041 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc042 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc043 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc044 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc045 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc046 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc047 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc048 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc049 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc050 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc051 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc052 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc053 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc054 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc055 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc056 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc057 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc058 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc059 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc060 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc061 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc062 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc063 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc064 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc065 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc066 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc067 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc068 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc069 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc070 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc071 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc072 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc073 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc074 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc075 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc076 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc077 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc078 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc079 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc080 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc081 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc082 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc083 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc084 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc085 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc086 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc087 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc088 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc089 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc090 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc091 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc092 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc093 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc094 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc095 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc096 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc097 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc098 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc099 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc100 0 $To run this function use Call<> function $You can change its name from the tree control. END ABOUT Dialog About... 0,0,278,111 WS_CHILD,WS_VISIBLE,WS_SYSMENU,2, 0 192,192,192 EVENTS:17 OnClose 0 $Object Type : Dialog $Event Name : OnClose END OnDragFile 0 $Object Type : Dialog $Event Name : OnDragFile $Parameter 0 : Number of files $Parameter 1 : Pathname 1 $Parameter 2 : Pathname 2... END OnDraw 0 $Object Type : Dialog $Event Name : OnDraw END OnHScroll 0 $Object Type : Dialog $Event Name : OnHScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END OnLButtonDbClk 0 $Object Type : Dialog $Event Name : OnLButtonDbClk END OnLButtonDown 0 $Object Type : Dialog $Event Name : OnLButtonDown END OnLButtonUp 0 $Object Type : Dialog $Event Name : OnLButtonUp END OnMButtonDbClk 0 $Object Type : Dialog $Event Name : OnMButtonDbClk END OnMButtonDown 0 $Object Type : Dialog $Event Name : OnMButtonDown END OnMButtonUp 0 $Object Type : Dialog $Event Name : OnMButtonUp END OnMove 0 $Object Type : Dialog $Event Name : OnMove END OnRButtonDbClk 0 $Object Type : Dialog $Event Name : OnRButtonDbClk END OnRButtonDown 0 $Object Type : Dialog $Event Name : OnRButtonDown END OnRButtonUp 0 $Object Type : Dialog $Event Name : OnRButtonUp END OnSize 0 $Object Type : Dialog $Event Name : OnSize END OnStart 0 $Object Type : Dialog $Event Name : OnStart $ $Change Program Information #m_TextName.SetText<#General.GetApplicationName<>> #m_TextCopyright.SetText<"Copyright (c) 2001 - "&#General.GetAuthorName<>> #m_Button.SetImage<"image/ok.bmp", #General.GetRGB<"255", "255", "255">, "image/ok.bmp", #General.GetRGB<"255", "255", "255">> END OnVScroll 0 $Object Type : Dialog $Event Name : OnVScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END Disk Disk New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 General General New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Keyboard Keyboard New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:3 OnDlgKeyDown 0 $Object Type : Keyboard $Event Name : OnDlgKeyDown $Parameter 0 : Key Pressed END OnKeyDown 0 $Object Type : Keyboard $Event Name : OnKeyDown $Parameter 0 : Key Pressed END OnKeyUp 0 $Object Type : Keyboard $Event Name : OnKeyUp $Parameter 0 : Key Pressed END Math Math New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 MessageBox MessageBox New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Mouse Mouse New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:2 OnMove 0 $Object Type : Mouse $Event Name : OnMove END OnWheel 0 $Object Type : Mouse $Event Name : OnWheel $Parameter 0 : -1 if move down and 1 if move up END System System New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Timer Timer New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnTimer 0 $Object Type : Timer $Event Name : OnTimer $Parameter 0 : ID of the timer event END m_TextName Text My Program Name 55,15,200,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_TextCopyright Text Copyright (c) 2001 MyName 55,45,200,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_Button ButtonFlat OK 89,78,100,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick #ABOUT.CloseDialog<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END OPTION:19 zzFunc001,zzFunc002,zzFunc003,zzFunc004,zzFunc005,zzFunc006,zzFunc007,zzFunc008,zzFunc009,zzFunc010,zzFunc011,zzFunc012,zzFunc013,zzFunc014,zzFunc015,zzFunc016,zzFunc017,zzFunc018,zzFunc019,zzFunc020,zzFunc021,zzFunc022,zzFunc023,zzFunc024,zzFunc025,zzFunc026,zzFunc027,zzFunc028,zzFunc029,zzFunc030,zzFunc031,zzFunc032,zzFunc033,zzFunc034,zzFunc035,zzFunc036,zzFunc037,zzFunc038,zzFunc039,zzFunc040,zzFunc041,zzFunc042,zzFunc043,zzFunc044,zzFunc045,zzFunc046,zzFunc047,zzFunc048,zzFunc049,zzFunc050,zzFunc051,zzFunc052,zzFunc053,zzFunc054,zzFunc055,zzFunc056,zzFunc057,zzFunc058,zzFunc059,zzFunc060,zzFunc061,zzFunc062,zzFunc063,zzFunc064,zzFunc065,zzFunc066,zzFunc067,zzFunc068,zzFunc069,zzFunc070,zzFunc071,zzFunc072,zzFunc073,zzFunc074,zzFunc075,zzFunc076,zzFunc077,zzFunc078,zzFunc079,zzFunc080,zzFunc081,zzFunc082,zzFunc083,zzFunc084,zzFunc085,zzFunc086,zzFunc087,zzFunc088,zzFunc089,zzFunc090,zzFunc091,zzFunc092,zzFunc093,zzFunc094,zzFunc095,zzFunc096,zzFunc097,zzFunc098,zzFunc099,zzFunc100, If If New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 While While New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Function Function New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:100 zzFunc001 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc002 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc003 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc004 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc005 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc006 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc007 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc008 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc009 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc010 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc011 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc012 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc013 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc014 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc015 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc016 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc017 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc018 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc019 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc020 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc021 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc022 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc023 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc024 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc025 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc026 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc027 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc028 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc029 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc030 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc031 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc032 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc033 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc034 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc035 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc036 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc037 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc038 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc039 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc040 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc041 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc042 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc043 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc044 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc045 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc046 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc047 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc048 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc049 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc050 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc051 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc052 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc053 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc054 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc055 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc056 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc057 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc058 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc059 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc060 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc061 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc062 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc063 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc064 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc065 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc066 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc067 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc068 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc069 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc070 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc071 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc072 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc073 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc074 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc075 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc076 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc077 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc078 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc079 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc080 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc081 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc082 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc083 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc084 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc085 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc086 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc087 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc088 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc089 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc090 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc091 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc092 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc093 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc094 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc095 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc096 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc097 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc098 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc099 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc100 0 $To run this function use Call<> function $You can change its name from the tree control. END OPTION Dialog Options 0,0,393,122 WS_CHILD,WS_VISIBLE,WS_SYSMENU,2, 0 192,192,192 EVENTS:17 OnClose 0 $Object Type : Dialog $Event Name : OnClose END OnDragFile 0 $Object Type : Dialog $Event Name : OnDragFile $Parameter 0 : Number of files $Parameter 1 : Pathname 1 $Parameter 2 : Pathname 2... END OnDraw 0 $Object Type : Dialog $Event Name : OnDraw END OnHScroll 0 $Object Type : Dialog $Event Name : OnHScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END OnLButtonDbClk 0 $Object Type : Dialog $Event Name : OnLButtonDbClk END OnLButtonDown 0 $Object Type : Dialog $Event Name : OnLButtonDown END OnLButtonUp 0 $Object Type : Dialog $Event Name : OnLButtonUp END OnMButtonDbClk 0 $Object Type : Dialog $Event Name : OnMButtonDbClk END OnMButtonDown 0 $Object Type : Dialog $Event Name : OnMButtonDown END OnMButtonUp 0 $Object Type : Dialog $Event Name : OnMButtonUp END OnMove 0 $Object Type : Dialog $Event Name : OnMove END OnRButtonDbClk 0 $Object Type : Dialog $Event Name : OnRButtonDbClk END OnRButtonDown 0 $Object Type : Dialog $Event Name : OnRButtonDown END OnRButtonUp 0 $Object Type : Dialog $Event Name : OnRButtonUp END OnSize 0 $Object Type : Dialog $Event Name : OnSize END OnStart 0 $Object Type : Dialog $Event Name : OnStart $ $Load Ini Values #m_Ini.Open<#System.GetProgramFolder<>&"settings.ini"> #m_EditDomain.SetText<#m_Ini.GetValue<"OPTIONS", "DOMAIN">> #m_EditEmail.SetText<#m_Ini.GetValue<"OPTIONS", "EMAIL">> #m_Ini.Close<> $Button #m_ButtonOK.SetImage<"image/ok.bmp", #General.GetRGB<"255", "255", "255">, "", ""> #m_ButtonCancel.SetImage<"image/cancel.bmp", #General.GetRGB<"255", "255", "255">, "", ""> END OnVScroll 0 $Object Type : Dialog $Event Name : OnVScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END Disk Disk New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 General General New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Keyboard Keyboard New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:3 OnDlgKeyDown 0 $Object Type : Keyboard $Event Name : OnDlgKeyDown $Parameter 0 : Key Pressed END OnKeyDown 0 $Object Type : Keyboard $Event Name : OnKeyDown $Parameter 0 : Key Pressed END OnKeyUp 0 $Object Type : Keyboard $Event Name : OnKeyUp $Parameter 0 : Key Pressed END Math Math New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 MessageBox MessageBox New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Mouse Mouse New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:2 OnMove 0 $Object Type : Mouse $Event Name : OnMove END OnWheel 0 $Object Type : Mouse $Event Name : OnWheel $Parameter 0 : -1 if move down and 1 if move up END System System New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Timer Timer New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnTimer 0 $Object Type : Timer $Event Name : OnTimer $Parameter 0 : ID of the timer event END m_EditDomain Edit 127,19,256,22 WS_CHILD,WS_VISIBLE,ES_AUTOHSCROLL,WS_BORDER,WS_TABSTOP, 0 192,192,192 EVENTS:5 OnChange 0 $Object Type : Edit $Event Name : OnChange END OnHScroll 0 $Object Type : Edit $Event Name : OnHScroll END OnKillFocus 0 $Object Type : Edit $Event Name : OnKillFocus END OnSetFocus 0 $Object Type : Edit $Event Name : OnSetFocus END OnVScroll 0 $Object Type : Edit $Event Name : OnVScroll END m_TextDomain Text SMTP address : 23,24,97,22 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_EditEmail Edit 127,54,256,22 WS_CHILD,WS_VISIBLE,ES_AUTOHSCROLL,WS_BORDER,WS_TABSTOP, 0 192,192,192 EVENTS:5 OnChange 0 $Object Type : Edit $Event Name : OnChange END OnHScroll 0 $Object Type : Edit $Event Name : OnHScroll END OnKillFocus 0 $Object Type : Edit $Event Name : OnKillFocus END OnSetFocus 0 $Object Type : Edit $Event Name : OnSetFocus END OnVScroll 0 $Object Type : Edit $Event Name : OnVScroll END m_TextEmail Text Your email : 23,56,87,22 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_Ini Ini New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_ButtonOK ButtonFlat OK 102,89,79,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $Save Ini Values #m_Ini.Open<#System.GetProgramFolder<>&"settings.ini"> #m_Ini.SetValue<"OPTIONS", "DOMAIN", #m_EditDomain.GetText<>> #m_Ini.SetValue<"OPTIONS", "EMAIL", #m_EditEmail.GetText<>> #m_Ini.Close<> #OPTION.CloseDialog<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END m_ButtonCancel ButtonFlat Cancel 191,89,100,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $Close #OPTION.CloseDialog<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END EDIT:15 SetEmail,zzFunc002,zzFunc003,zzFunc004,zzFunc005,zzFunc006,zzFunc007,zzFunc008,zzFunc009,zzFunc010,zzFunc011,zzFunc012,zzFunc013,zzFunc014,zzFunc015,zzFunc016,zzFunc017,zzFunc018,zzFunc019,zzFunc020,zzFunc021,zzFunc022,zzFunc023,zzFunc024,zzFunc025,zzFunc026,zzFunc027,zzFunc028,zzFunc029,zzFunc030,zzFunc031,zzFunc032,zzFunc033,zzFunc034,zzFunc035,zzFunc036,zzFunc037,zzFunc038,zzFunc039,zzFunc040,zzFunc041,zzFunc042,zzFunc043,zzFunc044,zzFunc045,zzFunc046,zzFunc047,zzFunc048,zzFunc049,zzFunc050,zzFunc051,zzFunc052,zzFunc053,zzFunc054,zzFunc055,zzFunc056,zzFunc057,zzFunc058,zzFunc059,zzFunc060,zzFunc061,zzFunc062,zzFunc063,zzFunc064,zzFunc065,zzFunc066,zzFunc067,zzFunc068,zzFunc069,zzFunc070,zzFunc071,zzFunc072,zzFunc073,zzFunc074,zzFunc075,zzFunc076,zzFunc077,zzFunc078,zzFunc079,zzFunc080,zzFunc081,zzFunc082,zzFunc083,zzFunc084,zzFunc085,zzFunc086,zzFunc087,zzFunc088,zzFunc089,zzFunc090,zzFunc091,zzFunc092,zzFunc093,zzFunc094,zzFunc095,zzFunc096,zzFunc097,zzFunc098,zzFunc099,zzFunc100, If If New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 While While New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Function Function New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:100 SetEmail 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Param 0 : Item Index $Param 1 : New Text $ $Change Email #m_Index.Set<#General.GetParam<"0">> #m_Edit.SetText<#General.GetParam<"1">> #m_Edit.SetSel<"0", "-1"> END zzFunc002 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc003 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc004 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc005 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc006 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc007 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc008 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc009 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc010 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc011 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc012 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc013 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc014 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc015 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc016 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc017 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc018 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc019 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc020 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc021 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc022 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc023 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc024 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc025 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc026 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc027 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc028 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc029 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc030 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc031 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc032 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc033 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc034 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc035 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc036 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc037 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc038 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc039 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc040 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc041 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc042 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc043 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc044 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc045 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc046 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc047 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc048 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc049 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc050 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc051 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc052 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc053 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc054 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc055 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc056 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc057 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc058 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc059 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc060 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc061 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc062 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc063 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc064 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc065 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc066 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc067 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc068 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc069 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc070 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc071 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc072 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc073 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc074 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc075 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc076 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc077 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc078 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc079 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc080 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc081 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc082 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc083 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc084 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc085 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc086 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc087 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc088 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc089 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc090 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc091 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc092 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc093 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc094 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc095 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc096 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc097 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc098 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc099 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc100 0 $To run this function use Call<> function $You can change its name from the tree control. END EDIT Dialog Email 0,0,254,67 WS_CHILD,WS_VISIBLE,WS_SYSMENU,2, 0 192,192,192 EVENTS:17 OnClose 0 $Object Type : Dialog $Event Name : OnClose END OnDragFile 0 $Object Type : Dialog $Event Name : OnDragFile $Parameter 0 : Number of files $Parameter 1 : Pathname 1 $Parameter 2 : Pathname 2... END OnDraw 0 $Object Type : Dialog $Event Name : OnDraw END OnHScroll 0 $Object Type : Dialog $Event Name : OnHScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END OnLButtonDbClk 0 $Object Type : Dialog $Event Name : OnLButtonDbClk END OnLButtonDown 0 $Object Type : Dialog $Event Name : OnLButtonDown END OnLButtonUp 0 $Object Type : Dialog $Event Name : OnLButtonUp END OnMButtonDbClk 0 $Object Type : Dialog $Event Name : OnMButtonDbClk END OnMButtonDown 0 $Object Type : Dialog $Event Name : OnMButtonDown END OnMButtonUp 0 $Object Type : Dialog $Event Name : OnMButtonUp END OnMove 0 $Object Type : Dialog $Event Name : OnMove END OnRButtonDbClk 0 $Object Type : Dialog $Event Name : OnRButtonDbClk END OnRButtonDown 0 $Object Type : Dialog $Event Name : OnRButtonDown END OnRButtonUp 0 $Object Type : Dialog $Event Name : OnRButtonUp END OnSize 0 $Object Type : Dialog $Event Name : OnSize END OnStart 0 $Object Type : Dialog $Event Name : OnStart $ $Set Focus #m_Edit.SetFocus<> END OnVScroll 0 $Object Type : Dialog $Event Name : OnVScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END Disk Disk New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 General General New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Keyboard Keyboard New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:3 OnDlgKeyDown 0 $Object Type : Keyboard $Event Name : OnDlgKeyDown $Parameter 0 : Key Pressed END OnKeyDown 0 $Object Type : Keyboard $Event Name : OnKeyDown $Parameter 0 : Key Pressed END OnKeyUp 0 $Object Type : Keyboard $Event Name : OnKeyUp $Parameter 0 : Key Pressed END Math Math New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 MessageBox MessageBox New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Mouse Mouse New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:2 OnMove 0 $Object Type : Mouse $Event Name : OnMove END OnWheel 0 $Object Type : Mouse $Event Name : OnWheel $Parameter 0 : -1 if move down and 1 if move up END System System New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Timer Timer New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnTimer 0 $Object Type : Timer $Event Name : OnTimer $Parameter 0 : ID of the timer event END m_Edit Edit 10,10,235,22 WS_CHILD,WS_VISIBLE,ES_AUTOHSCROLL,WS_BORDER, 0 192,192,192 EVENTS:5 OnChange 0 $Object Type : Edit $Event Name : OnChange END OnHScroll 0 $Object Type : Edit $Event Name : OnHScroll END OnKillFocus 0 $Object Type : Edit $Event Name : OnKillFocus END OnSetFocus 0 $Object Type : Edit $Event Name : OnSetFocus END OnVScroll 0 $Object Type : Edit $Event Name : OnVScroll END m_Index Number New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_Button ButtonFlat OK 77,38,100,25 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:4 OnClick 0 $Object Type : Button $Event Name : OnClick $ $Send new Email #Function.Call<"MAIN", "SetItemText", #m_Index.Get<>, #m_Edit.GetText<>> #EDIT.CloseDialog<> END OnMouseMove 0 $Object Type : ButtonFlat $Event Name : OnMouseMove END OnSelect 0 $Object Type : ButtonFlat $Event Name : OnSelect END OnUnselect 0 $Object Type : ButtonFlat $Event Name : OnUnselect END SENDING:15 SendNow,zzFunc002,zzFunc003,zzFunc004,zzFunc005,zzFunc006,zzFunc007,zzFunc008,zzFunc009,zzFunc010,zzFunc011,zzFunc012,zzFunc013,zzFunc014,zzFunc015,zzFunc016,zzFunc017,zzFunc018,zzFunc019,zzFunc020,zzFunc021,zzFunc022,zzFunc023,zzFunc024,zzFunc025,zzFunc026,zzFunc027,zzFunc028,zzFunc029,zzFunc030,zzFunc031,zzFunc032,zzFunc033,zzFunc034,zzFunc035,zzFunc036,zzFunc037,zzFunc038,zzFunc039,zzFunc040,zzFunc041,zzFunc042,zzFunc043,zzFunc044,zzFunc045,zzFunc046,zzFunc047,zzFunc048,zzFunc049,zzFunc050,zzFunc051,zzFunc052,zzFunc053,zzFunc054,zzFunc055,zzFunc056,zzFunc057,zzFunc058,zzFunc059,zzFunc060,zzFunc061,zzFunc062,zzFunc063,zzFunc064,zzFunc065,zzFunc066,zzFunc067,zzFunc068,zzFunc069,zzFunc070,zzFunc071,zzFunc072,zzFunc073,zzFunc074,zzFunc075,zzFunc076,zzFunc077,zzFunc078,zzFunc079,zzFunc080,zzFunc081,zzFunc082,zzFunc083,zzFunc084,zzFunc085,zzFunc086,zzFunc087,zzFunc088,zzFunc089,zzFunc090,zzFunc091,zzFunc092,zzFunc093,zzFunc094,zzFunc095,zzFunc096,zzFunc097,zzFunc098,zzFunc099,zzFunc100, If If New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 While While New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Function Function New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:100 SendNow 0 $To run this function use Call<> function $You can change its name from the tree control. $ $Param 0 : Count $ $Send All Email #m_Progress.SetRange<"0", #General.GetParam<"0">> #i.Set<"-1"> #While.WHILE<#i.AddOne<>, "<", #General.GetParam<"0">> #m_Progress.SetValue<#i.Get<>+"1"> #m_Text.SetText<"Address #"&#m_Progress.GetValue<>&" / "&#General.GetParam<"0">> #If.IF<#Function.Call<"MAIN", "SendMailTo", #i.Get<>>, "=", "0"> #SENDING.CloseDialog<> #If.ELSE<> #If.ENDIF<> #If.IF<#Keyboard.IsKeyDown<"ESCAPE">, "=", "1"> #SENDING.CloseDialog<> #If.ELSE<> #If.ENDIF<> #While.ENDWHILE<> #SENDING.CloseDialog<> END zzFunc002 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc003 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc004 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc005 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc006 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc007 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc008 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc009 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc010 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc011 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc012 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc013 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc014 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc015 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc016 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc017 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc018 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc019 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc020 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc021 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc022 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc023 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc024 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc025 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc026 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc027 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc028 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc029 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc030 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc031 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc032 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc033 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc034 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc035 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc036 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc037 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc038 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc039 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc040 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc041 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc042 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc043 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc044 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc045 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc046 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc047 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc048 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc049 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc050 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc051 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc052 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc053 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc054 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc055 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc056 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc057 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc058 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc059 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc060 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc061 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc062 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc063 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc064 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc065 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc066 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc067 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc068 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc069 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc070 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc071 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc072 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc073 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc074 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc075 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc076 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc077 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc078 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc079 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc080 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc081 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc082 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc083 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc084 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc085 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc086 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc087 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc088 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc089 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc090 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc091 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc092 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc093 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc094 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc095 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc096 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc097 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc098 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc099 0 $To run this function use Call<> function $You can change its name from the tree control. END zzFunc100 0 $To run this function use Call<> function $You can change its name from the tree control. END SENDING Dialog Sending... 0,0,201,57 WS_CHILD,WS_VISIBLE,WS_SYSMENU,2, 0 192,192,192 EVENTS:17 OnClose 0 $Object Type : Dialog $Event Name : OnClose END OnDragFile 0 $Object Type : Dialog $Event Name : OnDragFile $Parameter 0 : Number of files $Parameter 1 : Pathname 1 $Parameter 2 : Pathname 2... END OnDraw 0 $Object Type : Dialog $Event Name : OnDraw END OnHScroll 0 $Object Type : Dialog $Event Name : OnHScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END OnLButtonDbClk 0 $Object Type : Dialog $Event Name : OnLButtonDbClk END OnLButtonDown 0 $Object Type : Dialog $Event Name : OnLButtonDown END OnLButtonUp 0 $Object Type : Dialog $Event Name : OnLButtonUp END OnMButtonDbClk 0 $Object Type : Dialog $Event Name : OnMButtonDbClk END OnMButtonDown 0 $Object Type : Dialog $Event Name : OnMButtonDown END OnMButtonUp 0 $Object Type : Dialog $Event Name : OnMButtonUp END OnMove 0 $Object Type : Dialog $Event Name : OnMove END OnRButtonDbClk 0 $Object Type : Dialog $Event Name : OnRButtonDbClk END OnRButtonDown 0 $Object Type : Dialog $Event Name : OnRButtonDown END OnRButtonUp 0 $Object Type : Dialog $Event Name : OnRButtonUp END OnSize 0 $Object Type : Dialog $Event Name : OnSize END OnStart 0 $Object Type : Dialog $Event Name : OnStart END OnVScroll 0 $Object Type : Dialog $Event Name : OnVScroll $Parameter 0 : Previous Position $Parameter 1 : New Position $Parameter 2 : Variation END Disk Disk New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 General General New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Keyboard Keyboard New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:3 OnDlgKeyDown 0 $Object Type : Keyboard $Event Name : OnDlgKeyDown $Parameter 0 : Key Pressed END OnKeyDown 0 $Object Type : Keyboard $Event Name : OnKeyDown $Parameter 0 : Key Pressed END OnKeyUp 0 $Object Type : Keyboard $Event Name : OnKeyUp $Parameter 0 : Key Pressed END Math Math New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 MessageBox MessageBox New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Mouse Mouse New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:2 OnMove 0 $Object Type : Mouse $Event Name : OnMove END OnWheel 0 $Object Type : Mouse $Event Name : OnWheel $Parameter 0 : -1 if move down and 1 if move up END System System New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 Timer Timer New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:1 OnTimer 0 $Object Type : Timer $Event Name : OnTimer $Parameter 0 : ID of the timer event END m_Progress Progress New Object 10,25,180,22 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0 m_Text Text 25,3,150,19 WS_CHILD,WS_VISIBLE,SS_CENTER, 0 192,192,192 EVENTS:0 i LocalNumber New Object 10,10,150,150 WS_CHILD,WS_VISIBLE, 0 192,192,192 EVENTS:0